home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / ab20 / ab20_archive / games / strategy / madgic-corewar-4.0.lzh / 1989 / Wang1.s < prev    next >
Text File  |  1992-03-10  |  758b  |  22 lines
  1. ;    Wang1
  2. ;    by Alan Wang
  3.  
  4. start  mov #-1             sbeg   ;  set up counts for
  5.        mov #-256           dbeg   ;  self-copying
  6.        mov # 12            left
  7. again  mov < sbeg        < dbeg   ;  make a copy of wang 1 
  8.        djn   again         left   ;  back 256 in the mars
  9.        spl (start-256)            ;  and split to it
  10.        mov # 10            bstart 
  11.        mov # 14            bleft  ; set up bombing counts
  12. bagain mov   bomb        @ bstart ; bombing loop
  13.        add # 16            bstart
  14.        djn   bagain        bleft
  15.        jmp   start
  16. dbeg   dat               $ 0
  17. sbeg   dat               $ 0
  18. left   dat               $ 0
  19. bomb   dat               $ 0
  20. bstart dat               $ 0
  21. bleft  dat               $ 0
  22.        end   start